home *** CD-ROM | disk | FTP | other *** search
/ Amiga Developer CD 2.1 / Amiga Developer CD v2.1.iso / Reference / DevCon / Washington_1988 / DevCon88.2 / StartingAmigaC / exam4.c < prev    next >
Encoding:
C/C++ Source or Header  |  1992-08-27  |  12.1 KB  |  352 lines
  1. /*
  2.    Example of opening a simple window on a custom screen - #4
  3.    written by Dan Schein April-88 for the 1988 AMIGA Developers Conference. 
  4.  
  5.    This example, and all those based on this example, were compiled and
  6.    tested with the Lattice V4.0 compiler.
  7. */
  8.  
  9. /*
  10.   Copyright (c) 1988 Commodore-Amiga, Inc.
  11.  
  12.   Executables based on this information may be used in software
  13.   for Commodore Amiga computers.  All other rights reserved.
  14.  
  15.   This information is provided "as is"; no warranties are made.
  16.   All use is at your own risk, and no liability or responsibility is assumed.
  17. */
  18.  
  19.  
  20. #include <exec/types.h>
  21. #include <intuition/intuition.h>
  22. #include <graphics/display.h>
  23. #include <libraries/dos.h>
  24. #include <stdio.h>
  25.  
  26. /*
  27.    Define the Version of the Amiga OS we want (require)
  28.  
  29.    Operating System Version Information
  30.  
  31.       0     Any version is OK
  32.       30    1.0 or higher
  33.       31    1.1 NTSC or Higher
  34.       32    1.1 PAL  or Higher
  35.       33    1.2 or higher
  36.       34    1.3 or higher
  37.  
  38. */
  39.  
  40. #define INTUITION_REV 0
  41. #define GRAPHICS_REV  0
  42.  
  43. /*
  44.    Define the Flags for use in our menu structure's - Refer to the Intuition
  45.    Reference Manual for more detail
  46. */
  47.  
  48. #define FLAGSA ITEMTEXT|MENUTOGGLE|ITEMENABLED
  49. #define FLAGSB CHECKIT|ITEMTEXT|MENUTOGGLE|ITEMENABLED|COMMSEQ
  50. #define FLAGSC ITEMTEXT|MENUTOGGLE|ITEMENABLED|COMMSEQ
  51.  
  52. BOOL  Done;
  53. ULONG class, code, selection, menuNum, itemNum;
  54.  
  55. struct TextAttr MyFont =
  56. {
  57.    "topaz.font",                             /* Font Name                 */
  58.    TOPAZ_EIGHTY,                             /* Font Height               */
  59.    FS_NORMAL,                                /* Style                     */
  60.    FPF_ROMFONT                               /* Preferences               */
  61. };
  62.  
  63. struct NewScreen OurScreen =
  64. {
  65.    0, 0,                                     /* LeftEdge and TopEdge     */
  66.    640, 200,                                 /* Width and Height         */
  67.    2,                                        /* Depth (4 colors)         */
  68.    0, 1,                                     /* DetailPen and BlockPen   */
  69.    HIRES,                                    /* Special Display Mode     */
  70.    CUSTOMSCREEN,                             /* The Screen Type          */
  71.    &MyFont,                                  /* Use our own Font         */
  72.    "A Simple Screen",                        /* Screen Title             */
  73.    NULL,                                     /* Special Screen Gadgets   */
  74.    NULL                                      /* Special CustomBitMap     */
  75. };
  76.  
  77. struct NewWindow OurWindow =
  78. {
  79.    20, 20,                                   /* LeftEdge and TopEdge      */
  80.    300, 100,                                 /* Width and Height          */
  81.    0, 1,                                     /* DetailPen and BlockPen    */
  82.    CLOSEWINDOW|MENUPICK,                     /* IDCMP Flags               */
  83.    WINDOWCLOSE|SMART_REFRESH|                /* Flags                     */
  84.    ACTIVATE|WINDOWDRAG|WINDOWDEPTH|
  85.    WINDOWSIZING|SMART_REFRESH,
  86.    NULL, NULL,                               /* Gadget and Image pointers */
  87.    "A Simple Window",                        /* Window Title              */
  88.    NULL,                                     /* Screen pointer            */
  89.    NULL,                                     /* BitMap pointer            */
  90.    100, 25,                                  /* MinWidth and MinHeight    */
  91.    200, 50,                                  /* MaxWidth and MaxHeight    */
  92.    CUSTOMSCREEN                              /* Type of window            */
  93. };
  94.  
  95. struct IntuiText IText[] =
  96. {
  97.              /* Breakdown of the IntuiText Structure */
  98.    {
  99.    0, 1,                                     /* FrontPen and BackPen      */
  100.    JAM2,                                     /* DrawMode                  */
  101.    CHECKWIDTH, 0,                            /* LeftEdge and TopEdge      */
  102.    NULL,                                     /* TextAttr                  */
  103.    "QUIT?",                                  /* Itext (text)              */
  104.    NULL                                      /* NextText                  */
  105.    },
  106.              /* Most commonly used IntuiText syntax  */
  107.  
  108.    { 0, 1, JAM2, CHECKWIDTH, 0, NULL, "SURE!",   NULL},
  109.    { 0, 1, JAM2, CHECKWIDTH, 0, NULL, "FLASHER", NULL},
  110.    { 0, 1, JAM2, CHECKWIDTH, 0, NULL, "FLASH",   NULL},
  111.    { 0, 1, JAM2, CHECKWIDTH, 0, NULL, "ON/OFF",  NULL},
  112.    { 0, 1, JAM2, CHECKWIDTH, 0, NULL, "FLIP?",   NULL}
  113. };
  114.  
  115. struct MenuItem M0I1S0[] =                   /* This is Menu 0 - Item 1   */
  116. {                                            /*               SubItem 0   */
  117.    {
  118.    NULL,                                     /* Next Item                 */
  119.    100, 6,                                   /* LeftEdge and TopEdge      */
  120.    80+CHECKWIDTH, 10,                        /* Width and Height          */
  121.    FLAGSC,                                   /* Flags (see #define)       */
  122.    0,                                        /* Mutual Exclude            */
  123.    (APTR)&IText[3],                          /* ItemFill                  */
  124.    NULL,                                     /* SelectFill                */
  125.    'F',                                      /* Command                   */
  126.    NULL                                      /* NextSelect                */
  127.    } 
  128. };
  129.  
  130. struct MenuItem M0I2S0[] =                   /* This is Menu 0 - Item 2   */
  131. {                                            /*               SubItem 0   */
  132.    {
  133.    NULL,                                     /* Next Item                 */
  134.    100,  6,                                  /* LeftEdge and TopEdge      */
  135.    80+CHECKWIDTH, 10,                        /* Width and Height          */
  136.    FLAGSB,                                   /* Flags (see #define)       */
  137.    0,                                        /* Mutual Exclude            */
  138.    (APTR)&IText[5],                          /* ItemFill                  */
  139.    NULL,                                     /* SelectFill                */
  140.    'R',                                      /* Command                   */
  141.    NULL                                      /* NextSelect                */
  142.    } 
  143. };
  144.  
  145. struct MenuItem M0[] = 
  146. {
  147.    {                                         /* This is Menu 0 - Item 0   */
  148.    &M0[1],                                   /* Next Item                 */
  149.    0, 0,                                     /* LeftEdge and TopEdge      */
  150.    56+CHECKWIDTH, 10,                        /* Width and Height          */
  151.    FLAGSA,                                   /* Flags (see #define)       */
  152.    0,                                        /* Mutual Exclude            */
  153.    (APTR)&IText[0],                          /* ItemFill (text)           */
  154.    (APTR)&IText[1],                          /* SelectFill (alt-text)     */
  155.    NULL,                                     /* Command                   */
  156.    NULL,                                     /* SubItem                   */
  157.    NULL                                      /* NextSelect                */
  158.    },
  159.  
  160.    {                                         /* This is Menu 0 - Item 1   */
  161.    &M0[2],                                   /* Next Item                 */
  162.    0, 12,                                    /* LeftEdge and TopEdge      */
  163.    56+CHECKWIDTH, 10,                        /* Width and Height          */
  164.    FLAGSA,                                   /* Flags (see #define)       */
  165.    0,                                        /* Mutual Exclude            */
  166.    (APTR)&IText[2],                          /* ItemFill (text)           */
  167.    NULL,                                     /* SelectFill (alt-text)     */
  168.    NULL,                                     /* Command                   */
  169.    &M0I1S0[0],                               /* SubItem                   */
  170.    NULL                                      /* NextSelect                */
  171.    },
  172.  
  173.    {                                         /* This is Menu 0 - Item 2   */
  174.    NULL,                                     /* Next Item                 */
  175.    0, 24,                                    /* LeftEdge and TopEdge      */
  176.    56+CHECKWIDTH, 10,                        /* Width and Height          */
  177.    FLAGSA,                                   /* Flags (see #define)       */
  178.    0,                                        /* Mutual Exclude            */
  179.    (APTR)&IText[4],                          /* ItemFill (text)           */
  180.    NULL,                                     /* SelectFill (alt-text)     */
  181.    NULL,                                     /* Command                   */
  182.    &M0I2S0[0],                               /* SubItem                   */
  183.    NULL                                      /* NextSelect                */
  184.    } 
  185. };
  186.  
  187. struct Menu TheMenu[] =
  188. {
  189.    {
  190.    NULL,                                     /* Next Menu                 */
  191.    0, 0,                                     /* LeftEdge and TopEdge      */
  192.    56+CHECKWIDTH, 10,                        /* Width and Height          */
  193.    MENUENABLED,                              /* Flags                     */
  194.    "OUR MENU",                               /* Menu Title                */
  195.    &M0[0]                                    /* First Item                */
  196.    } 
  197. };
  198.  
  199. struct Screen *screen;
  200. struct Window *window;
  201. struct GfxBase *GfxBase;
  202. struct IntuiMessage *message;
  203. struct Menu *MyMenu = &TheMenu[0];
  204. struct IntuitionBase *IntuitionBase;
  205.  
  206. void main(), chkmsg(), flash(), cleanexit(), cleanup();
  207.  
  208.  
  209.  
  210. void main()
  211. {
  212.               /* Method #1 of opening and error testing */
  213.  
  214.    IntuitionBase=(struct IntuitionBase*)
  215.       OpenLibrary("intuition.library",INTUITION_REV);
  216.  
  217.    if (IntuitionBase == NULL)
  218.    {
  219.       cleanexit ("Open Intuition Library failed!\n", RETURN_FAIL);
  220.    }
  221.  
  222.    GfxBase=(struct GfxBase*)OpenLibrary("graphics.library",GRAPHICS_REV);
  223.  
  224.    if (GfxBase == NULL)
  225.    {
  226.       cleanexit ("Open Graphics Library failed!\n", RETURN_FAIL);
  227.    }
  228.  
  229.               /* Method #2 of opening and error testing */
  230.  
  231.    if((screen=(struct Screen*)OpenScreen(&OurScreen))==NULL)
  232.    {
  233.       cleanexit ("Open Screen failed!\n", RETURN_FAIL);
  234.    }
  235.  
  236.    OurWindow.Screen=screen;
  237.  
  238.    if((window=(struct Window *)OpenWindow(&OurWindow))==NULL)
  239.    {
  240.       cleanexit ("Open Window failed!\n", RETURN_FAIL);
  241.    }
  242.  
  243.    Move(window->RPort, 20, 20);
  244.    Text(window->RPort, "Our own TEXT string!", 20);
  245.  
  246.    SetMenuStrip(window, MyMenu);
  247.  
  248.    while(!Done)
  249.    {
  250.       Wait(1<<window->UserPort->mp_SigBit);
  251.       chkmsg();
  252.    }
  253.  
  254.    cleanup();
  255.    exit (RETURN_OK);
  256. }
  257.  
  258.  
  259.  
  260. void chkmsg()
  261. {
  262.    while(message = (struct IntuiMessage *)GetMsg(window->UserPort))
  263.    {
  264.       class = message->Class;
  265.       code  = message->Code;
  266.       switch(class)
  267.       {
  268.          case CLOSEWINDOW:
  269.             Done = TRUE;
  270.             break;
  271.          case MENUPICK:
  272.             selection = code;
  273.             while (selection != MENUNULL)
  274.             {
  275.                menuNum = MENUNUM(selection);
  276.                itemNum = ITEMNUM(selection);
  277.                switch(menuNum)
  278.                {
  279.                   case 0:    /* Project Menu */
  280.                   switch(itemNum)
  281.                   {
  282.                      case 0:
  283.                         Done = TRUE;
  284.                         break;
  285.                      case 1:
  286.                         flash();
  287.                         break;
  288.                      case 2:
  289.                         break;
  290.                      default:
  291.                         break;
  292.                   }
  293.                   break;
  294.  
  295.                   default:
  296.                      break;
  297.                }
  298.                selection = ((struct MenuItem *)ItemAddress
  299.                      (&TheMenu,selection))->NextSelect;
  300.             }
  301.             break;
  302.          default:
  303.             break;
  304.       }
  305.    ReplyMsg(message);
  306.    }
  307. }
  308.  
  309. void flash()
  310. {
  311.    int i;
  312.  
  313.    for (i=0;i<4;i++)      /* do it four times  */
  314.    {
  315.       DisplayBeep(0);     /* screen flash!     */
  316.       Delay (15);         /* wait 15/50ths sec */
  317.    }
  318. }
  319.  
  320. void cleanexit(s, err)
  321. UBYTE *s;
  322. int err;
  323. {
  324.    if(*s) printf(s);
  325.    cleanup();
  326.    exit(err);
  327. }
  328.  
  329. void cleanup()
  330. {
  331.    if(window)
  332.    {
  333.       ClearMenuStrip(window);
  334.       CloseWindow(window);
  335.    }
  336.  
  337.    if(screen)
  338.    {
  339.       CloseScreen(screen);
  340.    }
  341.  
  342.    if(GfxBase)
  343.    {
  344.       CloseLibrary(GfxBase);
  345.    }
  346.  
  347.    if(IntuitionBase)
  348.    {
  349.       CloseLibrary(IntuitionBase);
  350.    }
  351. }
  352.